home *** CD-ROM | disk | FTP | other *** search
/ CU Amiga Super CD-ROM 17 / CU Amiga Magazine's Super CD-ROM 17 (1997)(EMAP Images)(GB)[!][issue 1997-12].iso / CUCD / Programming / DiceSource / lib / amiga / aprof.a < prev    next >
Text File  |  1994-02-01  |  369b  |  27 lines
  1.  
  2.         ;   APROF.A
  3.         ;
  4.         ;   Profiler tags
  5.  
  6.         section text,code
  7.  
  8.         xdef    __ProfInit
  9.         xdef    __ProfExec
  10.  
  11.         xref    @_CProfInit
  12.         xref    @_CProfExec
  13.  
  14. __ProfInit    move.l    A6,A1
  15.         jsr    @_CProfInit(pc)
  16.         moveq.l #0,D0
  17.         rts
  18.  
  19. __ProfExec    movem.l D0/D1/A0/A1,-(sp)
  20.         move.l    16(sp),A0           ; return address (subroutine id)
  21.         jsr    @_CProfExec(pc)
  22.         movem.l (sp)+,D0/D1/A0/A1
  23.         rts
  24.  
  25.         END
  26.  
  27.